home *** CD-ROM | disk | FTP | other *** search
/ Video Toaster 4.2 / Video Toaster v4.2.iso / arexx / cg / attribscripts / greyextrude.rexx < prev    next >
OS/2 REXX Batch file  |  1995-02-17  |  499b  |  20 lines
  1. /* GreyExtrude.rexx -- An Attribute Setter   */
  2. /* By A. Random User ©1994 NewTek, Inc. */
  3. /* (Based on a program by Bob Caron.)   */
  4.  
  5. call addlib(CG_AREXX,0)
  6.  
  7. CALL SET_CHAR(FILL,'0')
  8. CALL SET_CHAR(BOTR,180,180,180,112)
  9. CALL SET_CHAR(RGBA,180,180,180,112)
  10. CALL SET_BORD(FILL,'0')
  11. CALL SET_BORD(BOTR,0,0,0,96)
  12. CALL SET_BORD(SIZE,0)
  13. CALL SET_BORD(PRIO,1)
  14. CALL SET_BORD(TOPR,0,0,0,96)
  15. CALL SET_SHAD(TYPE,2)
  16. CALL SET_SHAD(SPOT,3)
  17. CALL SET_SHAD(PRIO,B)
  18. CALL SET_SHAD(SIZE,1)
  19. CALL SET_SHAD(TOPR,0,0,0,80)
  20.